home *** CD-ROM | disk | FTP | other *** search
- /*
- * abouthelp.c : file containing about(), and help(), as well as
- * all the text structs for autorequesters.
- */
-
- extern struct Window *wG;
- extern struct TextAttr TOPAZ80;
-
- /*
- * Data describing the requestor text
- *
- */
-
- struct IntuiText oktxt = {
- 2,1,JAM2, /* front and back text pens, drawmode and fill byte */
- 5,3, /* XY origin relative to container TopLeft */
- &TOPAZ80, /* font pointer or NULL for default */
- (UBYTE *)"OK", /* pointer to text */
- NULL /* next IntuiText structure */
- };
-
- struct IntuiText parfailtxt = {
- 2,1,JAM2, /* front and back text pens, drawmode and fill byte */
- 14,16, /* XY origin relative to container TopLeft */
- &TOPAZ80, /* font pointer or NULL for default */
- (UBYTE *)"Parallel failed to open", /* pointer to text */
- NULL /* next IntuiText structure */
- };
-
- struct IntuiText prerrtxt2 = {
- 2,1,JAM2, /* front and back text pens, drawmode and fill byte */
- 14,32, /* XY origin relative to container TopLeft */
- &TOPAZ80, /* font pointer or NULL for default */
- (UBYTE *) NULL, /* filled in from sys_errlist */
- NULL /* next IntuiText structure */
- };
-
- struct IntuiText prerrtxt = {
- 2,1,JAM2, /* front and back text pens, drawmode and fill byte */
- 14,16, /* XY origin relative to container TopLeft */
- &TOPAZ80, /* font pointer or NULL for default */
- (UBYTE *) "Error Encountered During Printing:",
- &prerrtxt2 /* next IntuiText structure */
- };
-
- struct IntuiText badcoptxt = {
- 2,1,JAM2, /* front and back text pens, drawmode and fill byte */
- 14,16, /* XY origin relative to container TopLeft */
- &TOPAZ80, /* font pointer or NULL for default */
- (UBYTE *)"Invalid Number of COPIES", /* pointer to text */
- NULL /* next IntuiText structure */
- };
-
- struct IntuiText prfailtxt = {
- 2,1,JAM2, /* front and back text pens, drawmode and fill byte */
- 14,16, /* XY origin relative to container TopLeft */
- &TOPAZ80, /* font pointer or NULL for default */
- (UBYTE *)"Printer failed to open", /* pointer to text */
- NULL /* next IntuiText structure */
- };
-
-
-
- struct IntuiText cantxt = {
- 2,1,JAM2, /* front and back text pens, drawmode and fill byte */
- 5,3, /* XY origin relative to container TopLeft */
- &TOPAZ80, /* font pointer or NULL for default */
- (UBYTE *)"CANCEL", /* pointer to text */
- NULL /* next IntuiText structure */
- };
-
- struct IntuiText retrytxt = {
- 2,1,JAM2, /* front and back text pens, drawmode and fill byte */
- 5,3, /* XY origin relative to container TopLeft */
- &TOPAZ80, /* font pointer or NULL for default */
- (UBYTE *)"RETRY", /* pointer to text */
- NULL /* next IntuiText structure */
- };
-
- struct IntuiText aboutmsg4 = {
- 0,1,JAM2, /* front and back text pens, drawmode and fill byte */
- 14,40, /* XY origin relative to container TopLeft */
- &TOPAZ80, /* font pointer or NULL for default */
- (UBYTE *) " December 22, 1988", /* pointer to text */
- NULL /* next IntuiText structure */
- };
-
- struct IntuiText aboutmsg3 = {
- 2,1,JAM2, /* front and back text pens, drawmode and fill byte */
- 14,30, /* XY origin relative to container TopLeft */
- &TOPAZ80, /* font pointer or NULL for default */
- (UBYTE *) " by Joel Swank", /* pointer to text */
- &aboutmsg4 /* next IntuiText structure */
- };
-
- struct IntuiText aboutmsg2 = {
- 0,1,JAM2, /* front and back text pens, drawmode and fill byte */
- 14,20, /* XY origin relative to container TopLeft */
- &TOPAZ80, /* font pointer or NULL for default */
- (UBYTE *) " Version 1.1",
- &aboutmsg3 /* next IntuiText structure */
- };
-
- struct IntuiText aboutmsg = {
- 0,1,JAM2, /* front and back text pens, drawmode and fill byte */
- 14,10, /* XY origin relative to container TopLeft */
- &TOPAZ80, /* font pointer or NULL for default */
- (UBYTE *)" SUPER Return Label Printer", /* pointer to text */
- &aboutmsg2 /* next IntuiText structure */
- };
-
- /* Text for Help Screen */
- char *HelpText[30] = {
- " Super Return Labels",
- "",
- " Super Return Label prints return address labels 3-up on single-wide",
- "3.5 inch by 7/16 inch label stock. It can use condensed printing to get",
- "19 characters per line and condensed-elite to get 23 characters per line.",
- "It can also print 3, 4 or 5 lines per label. Four and five line labels",
- "are printed with superscript characters and partial line advances.",
- " Gadgets are used to select number of lines and linesize. Six string",
- "gadgets are used to enter the 5 data lines and the number of copies.",
- "There are PRINT and STOP gadgets to start/stop printing.",
- " The options menu allows centering to be turned on and off. It also",
- "allows selection of the printer type. Amiga printer uses the PRT: device",
- "and should work with any printer. Epson printer uses the PAR: device and",
- "will work only with Epson compatible printers. Only Epson mode allows",
- "4-line or 5-line labels, because of the inability of the Amiga escape",
- "codes to do partial line feeds.",
- NULL };
-
- /*
- * Handle help request
- */
-
- extern struct NewWindow NewWindowStructure2;
- struct Window *wH;
- struct RastPort *rpH;
-
- struct Window *OpenWindow();
- struct IntuiMessage *GetMsg();
- struct TextFont *OpenFont();
-
- help()
- {
- struct IntuiMessage *message; /* the message from the IDCMP */
- struct TextFont *font;
- ULONG class;
- int i;
-
- font = NULL;
- wH = NULL;
-
- wH = OpenWindow(&NewWindowStructure2); /* open the window */
- if ( wH == NULL )
- return;
-
- rpH = wH->RPort; /* get a rastport pointer for the window */
-
- font = OpenFont(&TOPAZ80);
- if (font) SetFont(rpH,font);
- SetAPen(rpH,1L);
-
- for (i=0; i<40; i++) /* dump the whole help text array */
- {
- if (!HelpText[i]) break;
- Move(rpH,25L,(long) (i+1)*8+12);
- Text(rpH,HelpText[i], (long) strlen(HelpText[i]));
- }
- while(1)
- {
- WaitPort(wH->UserPort);
- while( (message = (struct IntuiMessage *)
- GetMsg(wH->UserPort) ) != NULL)
- {
- class = message->Class;
- ReplyMsg(message);
- switch (class)
- {
- case GADGETUP:
- goto exit;
- break;
- case MENUPICK:
- continue;
- }
- }
- }
- exit:
- if (font) CloseFont(font);
- if (wH) CloseWindow(wH);
-
- }
-
-
- /*
- * Handle 'about' request
- */
-
-
- about()
- {
- AutoRequest(wG,&aboutmsg,0L,&oktxt,0L,0L,300L,75L);
- }
-